% V20210224 - 4.3.2 GW_CENTER_PAGE_VER

INCLUDE "GW.bas"

% Create a page.
p = GW_NEW_PAGE()

% Prepare title bar string.
Title$ = GW_ADD_BAR_TITLE$("Vertical Center Example")

% Add title to page.
GW_ADD_TITLEBAR(p,Title$)

% Vertically center page content.
% Comment the following line to prevent centering.
GW_CENTER_PAGE_VER(p)

% Add descriptive text.
GW_ADD_TEXT(p, "This is an example of the CENTER PAGE VER function.")

% Add descriptive text.
GW_ADD_TEXT(p, "Here we add an IMAGE:")

% Now add an image control.
GW_ADD_IMAGE(p, "cartman.png")

% Now show the page.
GW_RENDER(p)

DO
 % Wait for user action.
 r$ = GW_WAIT_ACTION$()

 % Place here any necessary code to process user actions.

 % Some feedback.
 POPUP r$

% End when BACK key is pressed.
UNTIL r$ = "BACK"

END "End of Vertical Center example."